<?php
//Student 11 Lauri Link 15.11.11
include "error.php";

//Sisestamise koht

echo "
        <html>
        <head>
        <meta http-equiv='Content-Type' content='text/html; charset=utf-8'>
        </head>
        <form action=$_SERVER[SCRIPT_NAME] method=post>
<html><title>Teksti täiustamine</title>
<h1>Abiks algajale düsgraafikule</h1>
<h4>Siin üritame teksti inimsõbralikuks teha</h4>
<textarea name=original_text rows=10 cols=100>".$_POST[original_text]."</textarea><p><table>
<tr><td>Kui palju seda asja peaks muutma</td></tr><tr><td>

<select name=change>
      <option value=0>Ei muudagi</option>
      <option value=10>Natuke</option>
      <option selected='selected' value=4>Keskmiselt</option>
      <option value=2>Palju</option>
</select>

</td><td><input type=submit name=pedal value='Teeme proovi'></td>
</tr><p></table>";

//Teeme sisestatud teksti tükkideks, eraldajaks on tühik

$content = explode (" ", $_POST[original_text]);

//ja loeme kokku mitu tükki on

$all = count($content);

//Teeme tükeldatud tekstimassiivi omakorda jupikesteks, et muutused oleksid kogu tekstis.

$to_be_changed = array_chunk ($content, $_POST[change]);

//Leiame mitu jupikest tekkis

$content_bit = sizeof($to_be_changed)." tükikest<br />";

//Võtame igas alamjupikeses suvalise indeksi ja asendame ta vigade tabelist valitud suvalise veaga
    
for ($i = 0; $i < $content_bit; $i ++)
{
    $j = rand (0, sizeof($content_bit[$i]) -1);
    $k = rand (0, sizeof($error) - 1);

//    echo "Kasutati vigade varianti nr ". $k."<br />";

    $changed = str_replace ($error[$k][0], $error[$k][1], $to_be_changed[$i][$j]);
    $l = 0;

// Kui muutmisjärgne tulemus on sama mis esialgne siis korratakse operatsiooni 100 korda, valides iga kord järgmise suvalise vea 

    if ($changed == $to_be_changed[$i][$j])
    {
        for ($m = 0; $m < 101; $m ++)
            {
            $k = rand (0, sizeof($error) - 1);
            $changed = str_replace ($error[$k][0], $error[$k][1], $to_be_changed[$i][$j]);
            $l++;

//Kui tulemus siiski muutub lõpetatakse asi kohe ära

            if (($changed != $to_be_changed[$i][$j]))
                {
                $to_be_changed[$i][$j] = $changed;
                break;
                }
            }
    }
     else
     {
     $to_be_changed[$i][$j] = $changed;
     }

//Asendamise käigus pandi asendatud tükk samale kohale kus ta ennegi oli    

}

//Nüüd liidame alamjupikeste sisud kokku kasutades tühikut

for ($i = 0; $i < $content_bit; $i ++)
    {
    $changed_chunk[$i] = implode(" ", $to_be_changed[$i]);
    }

//Ja paneme alamjupikesed üheks tükiks kokku

for ($i = 0; $i < sizeof ($changed_chunk); $i ++)
    {    
    $changed_result = implode (" ", $changed_chunk);
    }

//$changed_chunk = implode(" ", $to_be_changed[0]);

echo '<h2>Vigadega tekst</h2><textarea name=changed_result rows=10 cols=100>';
print_r ($changed_result);
echo'</textarea>';
?>